home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / prog_c / cuj0696.zip / DWYER.ZIP / COUPON.TST / MEANSD.AWK < prev    next >
Text File  |  1996-03-15  |  450b  |  18 lines
  1. {
  2. MyVar = rand();
  3. MySum += MyVar;
  4. MySOS += MyVar^2;
  5.  
  6. sum += $NF
  7. SOS += $NF^2
  8. #
  9. #printf("running average = %4d: %f\n", NR, sum/NR)
  10. }
  11. END\
  12. {
  13.     printf("\ntotals: # readings: %d, average reading: %f\n", NR, sum/NR);
  14.     printf("Standard Deviation = %f\n", sqrt(SOS/NR - (sum/NR)^2));
  15.     printf("\nFrom AWK Generator: %d, average reading: %f\n", NR, MySum/NR);
  16.     printf("Standard Deviation = %f\n", sqrt(MySOS/NR - (MySum/NR)^2));
  17. }
  18.